home *** CD-ROM | disk | FTP | other *** search
/ Hot Metal Pro 4.0 / Hot Metal Pro 4.0.iso / HMPTools / VRCreate / data.z / Moveable Along XZ Plane.beh < prev    next >
Encoding:
Text File  |  1997-05-19  |  411 b   |  22 lines
  1. #VRML V2.0 utf8 - PLATINUM technology, inc., 1997
  2. #ADD_PLANE_SENSOR
  3.  
  4. DEF $OBJECT_SCRIPT Script {
  5.     eventIn        SFVec3f        newXZ
  6.     eventOut    SFVec3f        newXY
  7.     url"vrmlscript:
  8.         function newXZ(value)
  9.         {
  10.          newXY[0]=value[0];
  11.          newXY[1]=0;
  12.          newXY[2]=-value[1];
  13.         }
  14.     "
  15. }
  16.  
  17. #route map
  18.  
  19. ROUTE $OBJECTPS.translation_changed  TO $OBJECT_SCRIPT.newXZ
  20. ROUTE $OBJECT_SCRIPT.newXY TO $OBJECT.set_translation
  21.  
  22.